%Deze matlab functie bepaalt de een random tijd voor een lijnfout

function [duren] = tijden_lijn_fout(aantal_lijn_fouten)

% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% %Variabelen:
% intervallen_lijn_fout=[0.05 0.10 0.15 0.20 0.25 0.30 0.35 0.40 0.45 0.50  1] %tijden gebaseerd op 
% kansen_intervallen_lijn_fout=[0.25 0.35 0.2 0.05 0.05 0.02 0.02 0.02 0.02 0.01 0.01]
% 
% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
gegevens;
%In eerste instantie gaat het onderstaande script bepalen welke
%onderbrekingen ten gevolge van een lijnfout in een bepaald
%tijdsinterval komen te liggen. Daarna wordt binnen dit tijdsinterval een
%random tijd gekozen

R = randsample(intervallen_lijn_fout,aantal_lijn_fouten,true,kansen_intervallen_lijn_fout);

for i=1:1:aantal_lijn_fouten
    if i==1
        r = R(1,i);
        R(1,i)=r*rand(1);
    else
        indices=find(R(1,i)==intervallen_lijn_fout);
        r = R(1,i);
        l = intervallen_lijn_fout(1,indices);
        R(1,i)=r + (r-l).*rand(1);
    end
end
duren=R;